1 POKE53265,PEEK(53265)OR16
2 FORI=0TO9:POKE631+I,0:NEXT:POKE198,0
3 VL=54296:MA=54272:KO=54273:AM=54276:AD=54277:SR=54278:PRINT"[147]"
4 FORI=0TO24:POKEMA+I,0:NEXT:POKEVL,15:POKEAD,192:POKESR,190:POKEAM,129
5 POKE53281,0:POKE53280,0:POKEKO,100:FORI=1TO1000:NEXT
6 POKE53281,1:POKE53280,1:POKE53281,0:POKE53280,0:POKEAD+7,13:POKESR+7,0
7 POKEAM+7,129:POKEKO+7,2:POKEMA+7,120:FORI=1TO1000:NEXT
8 POKEAD+14,224:POKESR+14,240:POKEAM+14,81
9 POKEKO+14,8
11 PRINT"[147]..":POKE53281,1:POKE53281,0
12 FORI=1TO3000:NEXT:POKEAD+7,0:POKESR+7,0:POKEAM+7,0:POKEAD+7,13:POKESR+7,0
13 POKEAM+7,129:POKEKO+7,1:FORI=1TO3500:NEXT
14 PRINT"[209]  [209]"
15 FORI=7TO0STEP-1:FORJ=255TO0STEP-10:POKEKO+14,I:POKEMA+14,J:NEXTJ,I
16 PRINT"[169] [223][169] [223]"
17 PRINT"   [146]         "
18 PRINT"[223] [146][169][223] [146][169]"
19 POKEAD+14,0:POKESR+14,0:POKEAM+14,0:POKEMA+14,0:POKEKO+14,0:POKE53280,1
20 POKEAD+7,0:POKESR+7,0:POKEAM+7,0:POKEAD+7,13:POKESR+7,0:POKEAM+7,129
21 POKEKO+7,4:POKE53280,0:FORI=1TO800:NEXT:PRINT"[147]":FORI=1TO1500:NEXT
25 POKEAD+14,0:POKESR+14,240:POKEAM+14,129
26 POKEKO+14,40:POKEKO+14,8:FORI=1TO50:NEXT:POKEKO+14,0:FORI=1TO1000:NEXT
27 POKEKO+14,40:POKEKO+14,8:FORI=1TO50:NEXT:POKEKO+14,0:FORI=1TO1800:NEXT
28 POKEAD+14,15:POKESR+14,0:POKEAM+14,129
30 FORI=1TO20
31 FORK=1TO5:POKEKO+14,(50*RND(1)+20):NEXTK:POKEKO+14,0
32 FORL=1TO160:NEXTL,I
33 FORI=1TO1000:NEXT
35 POKEAD,12:POKESR,0:FORI=1TO2500:NEXT:POKE53281,0
36 FORI=0TO23:POKEMA+I,0:NEXT
40 PRINT"[147]	[142][149]"
41 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195]"
42 PRINTSPC(5)"                             "
43 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195]"
44 PRINTSPC(5)"         [176][195][195][195][195][195][195][174]            "
45 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][179][176][195][195][195][195][174][171][195][195][195][195][195][195][195][195][195][195][195][195]"
46 PRINTSPC(5)"[176][195][195][195][195][195][174]  [194][194][176][195][195][174][194][194] [213][178][201] [151][176][195][195][195][174][149]"
47 PRINTSPC(5)"[179]'  ''[149][171][195][195][179][194][194]'[149] [194][194][171][195][179][173][171][149][195][151][179]7. [171][149][195][195]"
48 PRINTSPC(5)"[194] '' '[149][194]  [194][194][194] '[149][194][194][194] [202][195][203] [151][194]OCT[194][149]"
49 PRINTSPC(5)"[179]' '' [149][171][195][195][179][194][173][195][195][189][194][171][195][195][195][195][195][151][179][166][166][166][171][149][195][195]"
50 PRINTSPC(5)"[173][195][195][195][195][195][189]  [194][194][219]   [194][194]     [151][173][195][195][195][189][149]  "
51 PRINTSPC(5)"[195][195][195][195][195][195][195][192][195][179][194][219]   [194][171][195][195][195][195][195][195][195][195][195][195][195][195]"
52 PRINTSPC(5)"         [194][194]    [194][194]            "
53 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][179][194]    [194][171][195][195][195][195][195][195][195][195][195][195][195][195]"
54 PRINTSPC(5)"         [194][194]    [194][194]            "
55 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][177][177][195][195][195][195][177][177][195][195][195][195][195][195][195][195][195][195][195][195]"
56 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195]"
57 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195]"
58 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195]"
59 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195]"
60 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195]    "
61 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195] [146][223]  "
62 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195] [146][195][223] "
63 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195] [146][195][195][223]"
64 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195] [146][195][195][195]";
70 POKEAD,0:POKESR,64:POKEAM,129:POKEKO,80
80 FORI=1TO1000:NEXT:POKE53281,14:POKE53280,14:FORI=1TO80:NEXT
81 POKE53281,0:POKE53280,0
82 POKEAD+7,13:POKESR+7,0:POKEAM+7,129:FORI=1TO500:POKEKO+7,2:POKEKO+7,1:NEXT
83 FORI=1TO700:NEXT:POKE53281,14:POKE53280,14:FORI=1TO50:NEXT:GOSUB 200:REM!!!!
84 POKEAD+7,0:POKESR+7,0:POKEAM+7,0:POKEMA+7,150:POKE53281,0:POKE53280,0
85 POKEAD+7,13:POKESR+7,0:POKEAM+7,129:FORI=1TO400:POKEKO+7,2:POKEKO+7,1:NEXT
86 FORJ=1TO2
87 POKE53281,14:POKE53280,14:FORI=1TO100:NEXT:POKE53281,0:POKE53280,0
88 FORK=1TO500:NEXTK,J:POKEAM+7,128
89 POKEAD+7,14:POKEKO+7,1:POKEMA+7,100:POKEAM+7,129:FORI=1TO7500:NEXT
90 PRINT"[151]'[165][167] [157][157][157][157][206]  [208][157][157][157][157][165]  [167][157][157][157][157][165]  [167][157][157][157][157][165]  [167][157][157][157]";
91 PRINT"[157][205]  [206][157][157][157][157] [165][167]'[157][157][157][157]'[165][167] [157][157][157][157] [165][167]'[157][157][157][157][157][157][169] [146][169]/[169] [146][169][157][157][157][157][157][157][157][157][169] [146][169]/[169] ";
92 PRINT"[146][169][157][157][157][157][157][157][157][157][169] [146][169]/[169] [146][169][157][157][157][157][157][157][157][157][169][146][169]    [146][169][157][157][157][157][157][157][157][157][169][146][169]   [169][146][169]";
93 PRINT"[157][157][157][157][157][157][157][157][169][146][169]   [169][146][169][157][157][157][157][157][157][157][157][169] [146]   [169][146][169][157][157][157][157][157][157][157][157][169] [146][169] [169] [146][169]";
95 POKEAD+7,0:POKESR+7,0:POKEAM+7,0:POKEMA+7,0:POKEKO+7,0:POKEAD+7,0
96 POKESR+7,254:POKEAM+7,129:POKEKO+7,70:FORI=1TO100:NEXT:POKEKO,45
97 FORI=1TO150:NEXT:POKEKO,0
199 GOTO500
200 PRINT"	[142][144]"
201 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195]"
202 PRINTSPC(5)"                             "
203 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195]"
204 PRINTSPC(5)"         [176][195][195][195][195][195][195][174]            "
205 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][179][176][195][195][195][195][174][171][195][195][195][195][195][195][195][195][195][195][195][195]"
206 PRINTSPC(5)"[176][195][195][195][195][195][174]  [194][194][176][195][195][174][194][194] [213][178][201] [176][195][195][195][174]"
207 PRINTSPC(5)"[179][151]'  ''[144][171][195][195][179][194][194][151]' [144][194][194][171][195][179][173][171][195][179]7. [171][195][195]"
208 PRINTSPC(5)"[194][151] '' '[144][194]  [194][194][194][151] '[144][194][194][194] [202][195][203] [194]OCT[194]"
209 PRINTSPC(5)"[179][151]' '' [144][171][195][195][179][194][173][195][195][189][194][171][195][195][195][195][195][179][166][166][166][171][195][195]"
210 PRINTSPC(5)"[173][195][195][195][195][195][189]  [194][194][219]   [194][194]     [173][195][195][195][189]  "
211 PRINTSPC(5)"[192][192][192][192][192][192][195][192][195][179][194][219]   [194][171][195][195][195][195][195][195][195][195][195][195][195][195]"
212 PRINTSPC(5)"         [194][194]    [194][194]            "
213 PRINTSPC(5)"[195][195][195][192][195][195][195][195][195][179][194]    [194][171][195][195][195][195][195][195][195][195][195][195][195][195]"
214 PRINTSPC(5)"         [194][194]    [194][194]            "
215 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][177][177][195][195][195][195][177][177][195][195][195][195][195][195][195][195][195][195][195][195]"
216 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195]"
217 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195]"
218 PRINTSPC(5)"[195][195][195][195][195][195][195][151][195][195][195][195][195][195][144][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195]"
219 PRINTSPC(5)"[195][195][195][192][192][192][151][195][169]  [146][169][195][144][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195]"
220 PRINTSPC(5)"[195][195][195][195][195][151][192][169]  [146][169][195][144][195][195][195][195][195][195][195][195][195][195][195][195][195][195]    "
221 PRINTSPC(5)"[192][195][195][192][151][192][169]  [146][169][195][144][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195] [146][223]  "
222 PRINTSPC(5)"[192][192][195][151][195][195][195][195][195][195][144][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195] [146][195][223] "
223 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195] [146][195][195][223]"
224 PRINTSPC(5)"[195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195] [146][195][195][195]";
230 RETURN
500 FORI=1TO5000:NEXT:POKEAM+7,128
505 PRINT"[147]";
510 PRINT"        WHAT'S HAPPENING... ?!?"
520 PRINT"[144]LOAD"CHR$(34)"02*"CHR$(34)",8:"
525 PRINT"RUN:";
530 POKE198,2:POKE631,13:POKE632,13
535 END